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Copyright (C) 1999 by Sony Computer Entertainment Inc. 
All Rights Reserved 


EZMIDI - Playing MIDI tunes and sound effects 
<Description> 
csl_hsyn, csl_midi, and csl_msin are used to play tunes and sound effects. 


This sample program is associated with an IOP sample program, and the two 
programs work together. The EE program will automatically load the IOP 
program, so the IOP module (iop/sample/sound/ezmidi) needs to be built 
beforehand. 


libsd can be used to play sound effects, but this sample program uses 
csl _hsyn. csl_msin is used on the EE side to generate a midi-stream, 
which is then transferred to the IOP where it is played by csl_hsyn. 


The advantages of using this method are that JAM files can be used and 
that SPU2 voice management does not need to be performed by the EE. By 
using the maximum number of voices and the highest priority for the two 
BGM and sound effects midi-stream input ports, it is possible to provide 
a feature that allows "up to n sounds to be used for sound effects and 
the remaining (48-n) to 48 voices for playing tunes." 


To minimize EE-IOP communications, a midi-stream buffer for sound effects 
is transferred to the IOP once in one frame only when a new sound effect 
is requested. The results of this are not noticed by the EE. Voice 
management is handled by csl_hsyn, and there is no possibility of dropped 
data in the buffer since the IOP loop operates much faster (240 Hz). 


EzBGM handles split loading of BD. Thus, large BDs can be transferred to 
the SPU2 local memory without an impact on IOP memory. 


DMA channel 1 is used to transfer BDs to SPU2 memory. When performing 
input/output block transfers (sceSdBlockTrans), etc. at the same time, 
make sure that there are no channel conflicts. 


<Files> 
main.c 
midi_rpc.c 
ezmidi_i.h 
sakana.sq 
sakana.hd 
sakana.bd 


eff.hd 
eff.bd 
<Execution> 
% make : compile for IOP (iop/sample/sound/ezmidi/) 
% Cd ??? : change to EE directory (ee/sample/sound/ezmidi/) 
% make : compile for EE 
%® make run : run 


A tune is played and pressing arrow keys will play sound effects. 


<Controller operations> 


cross button : Begin playing tune 

square button : Stop playing tune 
up arrow button 7 Sound effect (telephone) 
right arrow button : Sound effect (comedy, right) 
left arrow button : Sound effect (comedy, left) 
down arrow button : Sound effect (glass) 

START button : Pause/resume playing tune 
SELECT button : Exit program 


<Notes> 
MIDI messages are a musical format and have the following disadvantages 
when used for controlling sound effects. 


* Voices are handled with only channel numbers and key numbers, so 
the same key cannot be issued repeatedly while keying off individual 
keys. 

* Controls such as the pan pot affect the entire channel. 


"Extended MIDI messages" provide special extensions to overcome these 
problems. For information about this format, please refer to cslov.txt. 
For information about the API (sceMSIn_PutHsMsg, etc.), please refer to 


modmsin.txt. 


~~ BE/SAMPLE/EZMIDIY EZMIDI_1 


/* SCEI CONFIDENTIAL 
"PlayStation 2" Programmer Tool Runtime Library Release 1.4 


/* 
* 
* Copyright (C) 1998-1999 Sony Computer Entertainment Inc. 
* All Rights Reserved. 
* 
* EZMIDI - ezmidi_i.h 
* headder for EzMIDI 
* 
* Version Date Design Log 
Pe i a Se i “Sw ee ss ea ee ie et ei ee ee em ee ee cis ere eee 
* 1.30 Dec.12.1999 morita first checked in 
*/ 
//--- Bit 0x8000 indicates that there is a return value. 
//--- Bit 0x1000 indicates that the argument is a structure. 
//--- Bit 0x000 specifies the port (only related ones). 
#define EzZMIDI_START 0x0000 
#define EzZMIDI_INIT 0x8010 
#define EzMIDI_STOP 0x0020 
#define EZMIDI_SEEK 0x0030 
#define EZMIDI_SETSQ 0x0040 
#define EzMIDI_SETHD PO 0x9050 
#define EZMIDI_SETHD_P1 0x9051 
#define EZMIDI_TRANSBDPACKET 0x9060 
#define EZMIDI_TRANSBD 0x0070 
#define EZMIDI_GETFILELENGTH 0x9080 
#define EZMIDI_GETSTATUS 0x8090 
#define EZMIDI_SETATTR_PO 0x00a0 
#define EZMIDI_SETATTR_P1 0x00al 
#define EZMIDI_SETVOL_PO 0x00b0 
#define EZMIDI_SETVOL_P1 0x00b1 


#define MSIN_BUF_SIZE 256 


typedef struct { 


unsigned int hdAddr ; 
unsigned int bdAddr ; 
unsigned int bdSize; 
unsigned int spuAddr; 

char bdName [64-4*4]; 


} EZMIDI_BANK; 


#define PORTATTR_MASK_PRIORITY Ox0O0FF 
#define PORTATTR_MASK_MAXNOTE OxFFOO 


#define EZMIDI_DEV 0x00012346 
//#define PRINTF(x) printf x 
#define PRINTF (x) 


#define ERROR(x) printf x 
//#define ERROR (x) 


#define BASE _priority 32 


SRE Rae ee ee ee ara eT ee oe ee eee 


EE /SAMPLE/SOUND/EZ MIDI /MAIN.C 


/* SCEI CONFIDENTIAL 
“PlayStation 2" Programmer Tool Runtime Library Release 1.4 


* 


*7, 
/* 
* Emotion Engine Library Sample Program 
* Version 1.30 
x Shift-JIS 
* 
‘ Copyright (C) 1998-1999 Sony Computer Entertainment Inc. 
* All Rights Reserved. 
* 
* EZMIDI - main.c 
* main routine 
* 
. * Version Date Design Log 
RT a te ht Ne ef AE ae es ean PN a ed rs Oo a te eee ee ae 
* 1.30 Dec.12.1999 morita first checked in. 
. ay 


#include <eekernel .h> 
#include <libsdr.h> 
#include <csl.h> 
#include <cslmidi.h> 
#include <modhsyn.h> 
#include <libmsin.h> 
#include <sdrcemd.h> 
#include "“ezmidi_i.h" 
#include <libdev.h> 
#include <libpad.h> 


#define SQ FILENAME "host0:sakana.sq" 
#define HD _FILENAME1 "host0:sakana.hd" 
#define BD_FILENAME1 "host0O:sakana.bd" 
#define HD_FILENAME2 "host0O:eff.hd" 
#define BD_FILENAME2 “host0:eff.bd" 


#define PLAYSTAT_STOP 0 
#define PLAYSTAT_RUN 1 
#define PLAYSTAT_PREPARE 2 
#define PLAYSTAT_PAUSE 3 


#define SPU_TOP_ADDR 0x5010 
static sceCslCtx msinCtx; 

static sceCslBuffGrp msinBfGrp[2]; 
static sceCslBuffCtx msinBfCtx[1]; 


static char msinBf[MSIN_BUF_SIZE] __attribute__((aligned (64))); //-- Warning!: It is DMA-transfe 
rred to IOP, without modification. 


static EZMIDI_BANK gBank __attribute__((aligned (64))); //-- Warning! DMA transfer direct to the 
IOP 
static char gFilename[64] __attribute__((aligned (64))); //-- Warning! DMA transfer direct to the 
IOP 


extern int ezMidiInit( void ); 
extern int ezMidi( int command, int status ); 
extern int ezTransToIOP( void *iopAddr, void *eeAddr, int size ); 


void load_modules( void ) 


{ 
sceSifInitRpc (0); 


if (sceSifLoadModule("host0:/usr/local/sce/iop/modules/sio2man.irx",0, NULL) < 0){ 
printf ("loading sio2man.irx failed\n"); Exit(0); 


} 


if (sceSifLoadModule("host0:/usr/local/sce/iop/modules/padman.irx",0, NULL) < 0){ 
printf("loading padman.irx failed\n"); Exit(0); 


} 


if (sceSifLoadModule("host0:../../. ./lop/modules/libsd.irx", 


printf("loading libsd.irx Pa Ses Exit (0); 
} 


0, NULL) < 0){ 


if (sceSifLoadModule("host0:../../../../iop/modules/sdrdrv.irx",0, 


printf ("loading sdrdrv.irx failed\n"); Exit(0); 
} | 


NULL) < 0){ 


if (sceSifLoadModule("host0:../../../../iop/modules/modmidi.irx",0, NULL) < 0){ 


printf ("loading modmidi.irx failed\n"); Exit (0); 
} | 


printf ("loading modhsyn.irx failed\n"); Exit(0); 
} ; 


//-- Driver module for EzMIDI 


if (sceSifLoadModule("host0:../../../../iop/modules/modhsyn.irx" 


,0, NULL) < 0){ 


if (sceSifLoadModule("host0:../../../../iop/sample/sound/ezmidi/ezmidi.irx",0, NULL) < 0){ 


printf("loading ezmidi.irx failed\n"); Exit(0); 


} 


return; 


int dataset( int* sqaddr, int* hdladdr, jint* hd2addr ) 


{ 


int i, sqlen, hdllen, hd2len; 
sceSifInitIopHeap () 
strepy( gFilename, SQ FILENAME ); 
sqlen = ezMidi( EzMIDI _GETFILELENGTH, (int)gFilename ) ; 
strcpy( gFilename, HD_FILENAME1 ); 
hdllen = ezMidi( EzMIDI _GETFILELENGTH, (int)gFilename ) ; 
strcpy( gFilename, HD_FILENAMEZ2 ); 
hd2len = ezMidi( EZMIDI_GETFILELENGTH, (int)gFilename ) ; 
PRINTF (("allocate IOP heap memory -" yj); 
*sqaddr = sceSifAllocIopHeap( sqlen + hdilen + hd2len ee 
1f( *sqaddr < 0 ) { printf( "\nCan't alloc heap \n"); return 
PRINTF (("alloced 0x%x ", *sqaddr)) ;) 
*hdiaddr = (int) (*sgqaddr) + sqlen =; 
*hd2addr = (int) (*sqaddr) + sqlen + hdilen =; 
i = sceSifLoadIopHeap( SQ_FILENAME, (void*) *sqaddr) ; 
if( i< oO) { printf( "\nCan't load SQ_FILENAME to iop heap 
i = sceSifLoadiopHeap( HD_FILENAME1,: (void*) (*hdladdr) ); 
if( i < 0) { printf( "\nCan't load HD_FILENAME1 to iop heap 
i = sceSifLoadIopHeap( HD_FILENAME2, (void*) (*hd2addr) ); 
1f( i < 0) { printf( "\nCan't load HD_FILENAME2 to iop heap 
PRINTF (("- data loaded 0x%x \n", (int)*sqaddr )); 
return 0; 

Set SPU2 


void set_spu( void ) 


{ 


int i; 
sceSdEffectAttr r_attr; 


$a\n", 


sd\n", 


sd\n", 


i );return -1; } 


i); return -1; } 


i); return -1; } 


//-- initialize SPU 
sceSdRemoteInit(); 
sceSdRemote( 1, rSdInit , SD_INIT_COLD ); 


for( i = 0; i < 2; i++ ) 


{ 
//--- Effect setting 
//--- Set reverb end address in separate areas in core0 and corel 
sceSdRemote(1, rSdSetAddr, i|SD_A_EEA, Oxlfffff - 0x20000*i ); 
// --- set reverb attribute 
r_attr.depth_L = 0; 
r_attr.depth_R = 0; 
r_attr.mode = SD_REV_MODE_HALL | SD_REV_MODE_CLEAR_WA; 
sceSdRemote(1, rSdSetEffectAttr, i, &r_attr ); 
// --- reverb on 
sceSdRemote(1, rSdSetCoreAttr, i|SD_C_EFFECT_ENABLE, 1 ); 
sceSdRemote(1, rSdSetParam, i|SD_P_EVOLL , Ox3fff); 
sceSdRemote(1, rSdSetParam, i|SD_P_EVOLR , 0x3fff); 
//--- Set the master volume. 
sceSdRemote(1, rSdSetParam, i|SD_P_MVOLL , O0x3fff); 
sceSdRemote(1, rSdSetParam, i]SD_P_MVOLR , Ox3fff); 

} 

return; 


int init _se( int hd2addr ) 


{ 


int bd2size; 


gBank .hdAddr (int) hd2addr; 
gBank.spuAddr = SPU_TOP_ADDR; 

strcpy( gBank.bdName , BD_FILENAME2 ); 
printf ("bdname = %s\n", gBank.bdName ); 
FlushCache (WRITEBACK_DCACHE) ; 

//--- Read and set a bdfile. 


bd2size = gBank.bdSize = ezMidi( EZMIDI_TRANSBDPACKET, (int) (&gBank) 
//--- Set a hdfile. 


ezMidi( EzMIDI_SETHD_P1, (int) (&gBank) ); 


//--- Set the port priority and maximum number of notes. 
ezMidi( EZMIDI_SETATTR_P1, 0x0840 ); //pri 0x40, max 0x08 
//--- Set the port volume. 


ezMidi( EZMIDI_SETVOL_P1, sceHSyn_Volume_Odb ); 


msinCtx.extmod = NULL; 
msinCtx.callBack = NULL; 
msinCtx.conf = NULL; 
IsinCtx.buffGrpNum = 2; 
msinCtx.buffGrp = msinBfGrp; 
msinBfGrp[0] .buffNum 


msinBfGrp[0].buffCtx = NULL; 
msinBfGrp[(1].buffNum = 1; 
msinBfGrp[1].buffCtx = msinBfCtx; 


msinBfCtx[0].sema = 0; 

msinBfCtx[0].buff = msinBf; 
((sceCslMidiStream*)msinBf)->buffsize = MSIN_BUF_SIZE; 
( (sceCs1MidiStream*)msinBf)->validsize = 0; 


if (sceMSIn_Init(&msinCtx ) != sceMSInNoError) { 
printf ("sceMSIn_Init Error\n"); return 1; 

} 

//--- Change the program. 


sceMSIn_ProgramChange (&msinCtx, 0, 0, 0); 


); 


return bd2size; 


From music set-up to music performance start 
a eR a eh eS Ee ns ae I */ 


int init_music( int sqaddr, int hdladdr, int bd2size ) 


{ 


gBank.hdAddr = hdiladdr ; 

gBank.spuAddr = SPU_TOP_ADDR + bd2size +16; 
strcpy( gBank.bdName , BD_FILENAME1 ); 
printf ("bdname = %$s\n", gBank.bdName ); 
FlushCache (WRITEBACK_DCACHE) ; 

//--- Read and set a bdfile. 


gBank.bdSize = ezMidi( EzZMIDI_TRANSBDPACKET, (int) (&gBank) ); 
//--- Set a hdfile. 


ezMidi( EzMIDI_SETHD PO, (int) (&gBank) ); 


//--- Set the port priority and maximum number of notes. 
ezMidi( EZMIDI_SETATTR_PO, 0x3010 ); //pri 0x10, max 0x30 
//--- Set the port volume. 


ezMidi( EZMIDI_SETVOL_P0, sceHSyn_Volume_0db*0.8 ); 
//--- Set the sqfile. 

ezMidi( EzMIDI_SETSQ, sqaddr ); 

//--- Start the MIDI musical performance. 


ezMidi( EZzMIDI_START, 0); 
printf ("EzMIDI start!\n"); 


return 0; 


Soe Se Sei ee eee So eee Ok x] 


int main_loop( int iopMSINBuffAddr, int sqaddr ) 


{ 


int i, curStatus; 

u_int paddata, oldpad; 

u_char rdata[32]; 

u_long128 pad_dma_buf {[scePadDmaBufferMax] ; 
sceMSInHsMsg hs_msg; 

int playStat = PLAYSTAT_PREPARE; 


scePadInit (0); 
scePadPortOpen(0, 0, pad_dma_buf); 


while( 1 ) 
{ 
oldpad = paddata; 
if(scePadRead(0, 0, rdata) > 0){ 
paddata = Oxffff * ((rdata[2] << 8) | rdata[3]); 
} 
else{ 
paddata = 0; 
} 


if( paddata != oldpad ) 

{ 

//-- STOP 

if ( paddata & SCE_PADRleft }){ 
ezMidi( EzMIDI_STOP, 0); 
playStat = PLAYSTAT_STOP; 

} 

//-- PLAY 

else if( paddata & SCE_PADRdown ){ 
ezMidi( EZMIDI_SEEK, 0); 


ezMidi( EzMIDI_START, 0); 
playStat = PLAYSTAT_PREPARE; 


//-- PAUSE 
else if (paddata & SCE_PADstart ) { 


} 


if( playStat == PLAYSTAT_RUN ){ 
// Pause processing. 


ezMidi( EzMIDI_STOP, 0); 
playStat = PLAYSTAT_PAUSE; 

} 

else if ( playStat == PLAYSTAT_PAUSE ) { 
// Resume processing. 


ezMidi( EZzMIDI_START, 0); 
playStat = PLAYSTAT_PREPARE; 


//-- SE 
else if( paddata & SCE_PADLright ){ 


//-- Sets valid Pan only for the subsequent HS message. 


sceMSIn MakeHsPrePanpot( &hs_msg, 0, 127 ); 
sceMSIn_PutHsMsg (&msinCtx,0,&hs_msg) ; 


//-~- Note On with ID. Can be turned on/off individually using the same key. 


sceMSIn_MakeHsNoteOn({ &hs_msg, 0, 48, 0, 0x60 );//ID=0 
sceMSIn_PutHsMsg (&msinCtx,0,&hs_msg) ; 


} 
else if( paddata & SCE_PADLleft ){ 


//-- Sets valid Pan only for the subsequent HS message. 


sceMSIn_MakeHsPrePanpot( &hs_msg, 0, 0 ); 
sceMSIn_PutHsMsg (&msinCtx,0,&hs_msg) ; 


//-- Note On with ID. Can be turned on/off individually using the same key. 


sceMSIn_MakeHsNoteOn( &hs_msg, 0, 48, 1, 0x60 );//ID=1 
sceMSIn_PutHsMsg (&msinCtx,0,&hs_msg) ; 


} 
else if( paddata & SCE_PADLdown ){ 


//-- Normal (MIDI-compliant) Note On 


sceMSIn_NoteOn(&msinctx, 0, 0, 72, 0x60); 


} 
else if( paddata & SCE_PADLup ) { 


} 


//-- Normal (MIDI-compliant) Note On 


sceMSIn_ NoteOn(&msinCtx, 0, 0, 96, Ox7£); 


//-- QUIT 
else if (paddata & SCE_PADselect ){ 


if ( 
{ 


ezMidi({ EZMIDI_STOP, 0); 
return; 


((sceCslMidiStream*)msinBf)->validsize != 0 ) 


ezTransToIOP( (void*)iopMSINBuffAddr, (void*)msinBf, MSIN_BUF_SIZE ); 
((sceCslMidiStream*)msinBf)->validsize = 0; 


} 


curStatus = ezMidi( EZMIDI_GETSTATUS, 0); 


LE£ ( 


(playStat == PLAYSTAT_RUN) && (curStatus == 0) )f{ 


ezMidi( EzMIDI_SETSQ, sqaddr ); 
ezMidi( EZMIDI_START, 0); 
playStat = PLAYSTAT_PREPARE; 


} 


if ( 


(playStat == PLAYSTAT_PREPARE) && (curStatus != 0) ){ 


playStat = PLAYSTAT_RUN; 


} 


vSyne (); 


*/ 


int main( int argc, char *argv[] ) 
{ 
int i; 
int iopMSINBuf fAddr; 
int sgqaddr, hdladdr, hd2addr, bd2size; 
//--- Load modules 


load_modules (); 
printf ("EZMIDI initialize...\n"); 


//--- Initialize the EzMIDI RPC environment. 

ezMidiInit(); 

//--- Initialize SPU2. 

set_spu(); 

//--- Initialize the EzMIDI driver. 
// The argument is the buffer size for the bd's divided load. 
// The return value is the destination address of the sound effect buffer(msinBf). 

LlopMSINBuffAddr = ezMidi( EZMIDI_INIT, 16*1024 ); 

//--- Read sq and hdfile. 

dataset( &sqaddr, &hdladdr, &hd2addr ); 

//--- Set up the sound effect. 

bd2size = init_se(hd2addr) ; 

//--- Start music set up and performance. 

init_music( sqaddr, hdladdr , bd2size); 


//--- Control the musical performance 
main_loop(iopMSINBuffAddr, sqaddr) ; 


printf ("EzZMIDI finished...\n"); 
return 0; 
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EE/SAMPLE /EZMIDI Mibt _RPC.C, 


/* SCEI CONFIDENTIAL 
"PlayStation 2" Programmer Tool Runtime Library Release 1.4 
ei 


eo? 


/* 

x Emotion Engine Library Sample Program 

* Version 1.30 

* Shift-JIS 

* 

* Copyright (C) 1998-1999 Sony Computer Entertainment Inc. 
* All Rights Reserved. 

* 

* EZMIDI - midi_rpc.c 

* rpc routine for EzMIDI 

* 

* Version Date Design Log 

i nee Ses ee es sees em ete eee pms, Be eee es, See ee eee Bc ey ee ae ee ete ere a 
* 1.30 Dec.12.1999 morita first checked in. 

m/ 


#include <eekernel .h> 
#include <sif.h> 
#include <sifrpc.h> 
#include "“ezmidi_i.h" 


#define DATA_SIZE_STRING (64) 
#define DATA_SIZE_NORMAL (16) 


//-- Allocate 64 bytes to avoid cache misalignment 
static u_int sbuff[16] __attribute__((aligned (64))); 
static sceSifClientData gCd; 


/* ee eee 
Initialize rpc 
Seccse se sees * / 

int ezMidiInit( void ) 

{ 


int fd, i,cid; 
char *cp; 


sceSifInitRpc(0); 
while(1) { 


if (sceSifBindRpc( &gCd, EZMIDI_DEV, 0) < 0) { 
printf("error: sceSifBindRpc \n"); 


while(1); 
} 
i = 10000; 
while( i-- ){} 
1f(gCd.serve != 0) break; 
} 
return 1; 
} 
Yok: od hat Ee OS IS aa a A ee el 
Start IOP~side API with rpc and pass command and data 


a a a a a a ct a ne er ce */ 
int ezMidi( int command, int data ) 


{ 


int i, rsize = 0; 


if( (command&0x8000) !=0 ) 
rsize = 64; 


1£( (command&0x1000) !=0 )f{ 
sceSifCallRpc( &gCd, command, 0, (void *)data 
, DATA_SIZE_STRING, (void *) (&sbuff£[0]),rsize,NULL,NULL) ; 


} 
else{ 

sbuff£[0] = data; 

sceSifCallRpc({ &gCd, command, 0, (void *) (&sbuff£[0}) 

, DATA_SIZE_ NORMAL, (void *) (&sbuff[0]),rsize,NULL,NULL ); 
} 


return sbuff[0]; 


} 


Static sceSifDmaData transData; 


/ IE a Ng a el lf ca a ea sa te eS te A es eer SNE eon eee a et ne ee ee Set MS 
int ezTransToIOP( void *iopAddr, void *eeAddr, int size ) 
{ 
unsigned int did; 
transData.data = (u_int) eeAddr; 
transData.addr = (u_int)iopAddr; 
transData.size = size; 
transData.mode = 0; 
//-- FlushCache is slow, so non-cached access is better. 
FlushCache (WRITEBACK_DCACHE) ; 
did = sceSifSetDma( &transData, 1 ); 
while( sceSifDmaStat( did ) >= 0 ){} 
PRINTF (("send data completed \n")); 
if( did == 0 ) return -1; 
return 0; 
} 


en eed 
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IOP/SAMPLE /SOUNDEZ MID] /EZMID(_1. 4 


/* SCEI CONFIDENTIAL 
"PlayStation 2" Programmer Tool Runtime Library Release 1.4 


*/ 
/* 
* 
* Copyright (C) 1998-1999 Sony Computer Entertainment Inc. 
* All Rights Reserved. 
* 
* EZMIDI - ezmidi_i.h 
ia headder for EzMIDI 
* 
* Version Date Design Log 
a aE er a ne ne EO ae gan a Ss RS Penne ESP ey EE a ca te ee ee eS me 
* 1.30 Dec.12.1999 morita first checked in 
ae 
//--- Bit 0x8000 indicates that there is a return value. 
//--- Bit 0x1000 indicates that the argument is a structure. 
//--- Bit 0x000 specifies the port (only related ones). 
#define EzMIDI_START 0x0000 
#define EZMIDI_INIT 0x8010 
#define EZMIDI_STOP 0x0020 
#define EZMIDI_SEEK 0x0030 
#define EZMIDI_SETSQ 0x0040 
#define EZMIDI_SETHD_PO 0x9050 
#define EZMIDI_SETHD_P1 0x9051 
#define EZMIDI_TRANSBDPACKET 0x9060 
#define EZMIDI_TRANSBD 0x0070 
#define EZMIDI_GETFILELENGTH 0x9080 
#define EZMIDI_GETSTATUS 0x8090 
#define EZMIDI_SETATTR_PO 0x00a0 
#define EZMIDI_SETATTR_P1 0x00al 
#define EZMIDI_SETVOL_PO 0x00b0 
#define EZMIDI_SETVOL_P1 0x00b1 


#define MSIN_BUF_SIZE 256 


typedef struct { 


unsigned int hdAddr ; 
unsigned int bdAddr ; 
unsigned int bdSize; 
unsigned int spuAddr ; 

char bdName [64-4*4]; 


} EZMIDI_BANK; 


#define PORTATTR_MASK_PRIORITY Ox0OOFF 
#define PORTATTR_MASK_MAXNOTE OxFFOO 


module ID number 
In the sample, a number for the user. Change as appropriate. 
* 


#define EZMIDI_DEV 0x00012346 
//#define PRINTF(x) printf x 
#define PRINTF (x) 


#define ERROR(x) printf x 
//#define ERROR (x) 


#define BASE_priority 32 


BR tee iret weaegennrs erie ee ee aT AE TENT 


lOP/ SAMPLE /SOUMD/EZ MID /MIDI_CoM 0 


/* SCEI CONFIDENTIAL 
"PlayStation 2" Programmer Tool Runtime Library Release 1.4 


%f 
/* 
i I/O Proseccor sample program 
* Version 1.20 
5 Shift-JIs 
* 
* Copyright (C) 1998-1999 Sony Computer Entertainment Inc. 
7 All Rights Reserved. 
* 
* ezmidi.irx - midi_com.c 
* command dispatch routine 
* 
* * Version Date Design Log 
aa EE Ae a fli Ry YD AR Peeve Sg Papel TION EAs Tp OY IES SSID Be ey Ta gp oR a Oe Dan es ENE OT ae FETT SO Tal PRED 5 RN oI a ONE NET a 
* 1.20 Nov.23.1999 morita first checked in. 
Lr 


#include <kernel .h> 

#include <sys/types.h> 
#include <stdio.h> 
#include "sif.h" 
#include "sifcmd.h" 
#include "sifrpc.h" 
#include <libsd.h> 
#include “ezmidi_i.h" 


int gRpcArg[16]; //--- Receiving channel for RPC arguments transferred from EE 


static void* midiFunc(unsigned int fno, void *data, int size); 


extern int MidiStart( int foo ); 

extern int MidiInit( int foo ); 

extern int MidiSetHd{ int port, EZMIDI_BANK* bank ); 
extern int MidiSetSq( int addr ); 

extern int MidiStop( int addr ); 

extern int MidiSeek( int addr ); 

extern int MidiTransBd( EZMIDI_BANK* bank ); 

extern int MidiTransBdPacket( EZMIDI_BANK* bank ); 
extern int MidiGetIopFileLength( char* filename ); 
extern int MidiGetStatus (void) ; 


Main thread of ezmidi module. 
After execution, the interrupt environment is initialized and the commands 
are registered, then waits for a request from EE. 


int sce_midi_loop() 
{ 
sceSifQueueData qd; 
sceSifServeData sd; 
//-- Initialize interrupt environment in advance. 
CpuEnableiIntr(); 
EnableIntr( INUM_DMA_4 ); 
EnableIntr( INUM_DMA_7 ); 


//~-- Register function that is called according to request 


sceSifInitRpc (0); 

sceSifSetRpcQueue( &qd, GetThreadId() ); 

sceSifRegisterRpc( &sd, EZMIDI_DEV, midiFunc, (void*)gRpcArg, NULL, NULL, &qd ); 
PRINTF ( ("goto midi cmd loop\n")); 


//--- Command-wait loop 


sceSifRpcLoop (&qd) ; 


return 0; 


Function that is awakened by a request from the EE. 

The argument is stored in *data. The leading four bytes are reserved and are not used. 

The return value of this function becomes the return value of the EE side's RPC. 

When the argument is a structure, it is sent to gRpcData and used. 

When a structure is returned to the EE, the value is sent to the address of the first argument 


(on the EE side). 


static void* midiFunc(unsigned int command, void *data, int size) 


{ 


// 


int ch; 
asm volatile( "break 1"); 


PRINTF(( " midifunc %x, %x, %x, %x\n", *((int*)data + 0), 
*((int*)data + 1), *((int*)data + 2),*((int*)data + 3) )); 


ch = command&0x000F; 


switch( command&OxFFFO ) 
{ 
case EZMIDI_START: 
MidiStart(*((int*)data) ); 
break; 
case EZMIDI_INIT: 
ret = MidiInit(*((int*)data) ); 
break; 
case EzMIDI_SETSQ: 
MidiSetSq(*((int*)data) ); 
break; 
case EZMIDI_SETHD_ PO: 
case EzMIDI_SETHD P11: 
MidiSetHd( ch, (EZMIDI_BANK*) ((int*)data) ); 
break; 
case EZMIDI_STOP: 
MidiStop(*((int*)data) ); 
break; 
case EzMIDI_SEEK: 
MidiSeek( *((int*)data) ); 
break; 
case EZMIDI_TRANSBD: 
ret = MidiTransBd({(EZMIDI_BANK*) ((int*)data) ); 
break; 
case EZMIDI_TRANSBDPACKET: 
ret = MidiTransBdPacket( (EZMIDI_BANK*) ((int*)data) ); 
break; 
case EZMIDI_GETFILELENGTH: 
ret = MidiGetIopFileLength((char*) ((int*)data) ); 
break; 
case EZMIDI_GETSTATUS: 
ret = MidiGetStatus(); 
break; 
case EzMIDI_SETATTR_PO: 
case EzMIDI_SETATTR_P1: 
MidiSetPortAttr( ch, *((int*)data)); 
break; 
case EZMIDI_SETVOL_P0: 
case EZMIDI_SETVOL_P1: 
MidiSetPortVolume( ch, *((int*)data)); 


break; 

default: 
ERROR(("EZMIDI driver error: unknown command $d \n", *((int*)data) )); 
break; 

} 

PRINTF(( “return value = %x \n", ret )); 


| 
| 
return (void*) (&ret); 


* End on File 
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#include <kernel .h> 
#include <sys/types.h> 
#include <stdio.h> 
#include <sif.h> 
#include <sifcmd.h> 
#include <sifrpc.h> 
#include "ezmidi_i.h" 


ModuleInfo Module = {"ezmidi_driver", 0x0103 }; 


extern int sce_midi_loop(); 
extern volatile int gStThid; 


int create_th(); 


int start () 


{ 
BootParam *bp; 
struct ThreadParam param; 
int th; 
FlushDcache() ; 
bp = QueryBootParam(KEY_IOPbootparam) ; 
if( bp != NULL && (bp->eword[0] & IBP_no_iop_service)!=0 }) { 
ERROR((" No EzMidi driver \n")); 
return 1; 
} 
CpuEnableintr(); 
1if( ! sceSifCheckInit() ) 
sceSifInit(); 
sceSifInitRpc(0); 
printf ("EzMIDI driver version 1.2.0\n"); 
param.attr = TH_C; 
param.entry = sce_midi_loop; 
param.initPriority = BASE_priority-2; 
param.stackSize = 0x800; 
param.option = 0; 
th = CreateThread(&param) ; 
if (th > 0) { 
StartThread(th,0); 
printf(" Exit EZMIDI loader thread \n"); 
return 0; 
Jelsef{ 
return 1; 
} 
} 
/* jm a a, a ee ee a ams a aa a ct Ec a a ae, a aera re ea ae et a ee a 


* End on File 
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#include <stdio.h> 
#include <kernel.h> 
#include <sif.h> 
#include <csl.h> 
#include <cslmidi.h> 
#include <modmidi.h> 
#include <modhsyn.h> 
#include <libsd.h> 
#include <timerman.h> 
#include “ezmidi_i.h" 
#include <modmsin.h> 
#include <sys/file.h> 


#define MIDI_IN_PORT 0 
#define True 1 


#define STREAMBUF_SIZE 1024 


static sceCsilCtx midiCtx; 
static sceCslBuffGrp midiGrp[2]; 
static sceCslBuffCtx mInBfCtx[(2], mOutBfCtx[1]; 


static char streamBf [STREAMBUF_SIZE+sizeof (sceCs1MidiStream) ]; 
static sceMidiEnv midiEnv; 


static sceCslCtx synthCtx; 

static sceCslBuffGrp synthGrp; 
static sceCslBuffCtx sInBfCtx[4]; 
static sceHSynEnv synthEnv[2]; 


static char msinBf_T[MSIN_BUF_SIZE] ; 
static char msinBf_R[MSIN_BUF_SIZE] ; 


volatile int gWaitFlag; 
volatile int gTimerID; 
sceHSyn_VoiceStat gVstat; 
int gThid; 


typedef struct TimerCtx 
{ 

int threadID; 

int timerID; 
} TimerCtx; 


TimerCtx timer; 
int gSpuTransPacketSize; 


int gSpuTransPacketAddr; 
int gIsInPlay; 


/* an cana a Ec ee rr 
Interrupt handler for timer 
es asd a RS aS a es */ 

int IntFunc( TimerCtx* timer ) 

{ 


int m ; 


I = iGetTimerStatus (timer->timerID) ; 


if ( m & tEQUF_1 ) { 
iWakeupThread( timer->threadID ); 


} 
return 1; 
} 
[Reoo eee lvoe ees 
Operations performed for each Tick 
Tc a a Fes eat re x/ 
static int ATick(void) 
{ 
int oldstat; 
while(1) { 
SleepThread (); 
//-- If msin buffer was sent and received from EE, interrupts will be disabled. 
// Copy to msinBf_R. hsyn module uses msinBf_R. 
if ( ((sceCsl1MidiStream*)msinBf_T)->validsize != 0 ){ 
DisableIntr( INUM_DMA_10 , &oldstat ); //-- Disable SIF DMA interrupt. 
memcpy ( msinBf_R, msinBf_T, MSIN_BUF_SIZE ); 
((sceCslMidiStream*)msinBf_T)->validsize = 0; 
EnableIntr( INUM_DMA_10 ); //-- Disable SIF DMA interrupt. 
} 
gIsInPlay = sceMidi_isInPlay(&midiCtx, MIDI_IN_PORT) ; 
sceMidi_ATick(&midiCtx) ; 
sceHSyn_ATick (&synthCtx) ; 
} 
return 0; 
} 


static int makeMyThread( void ) 
{ 
struct ThreadParam param; 
int thid; 


param.attr 
param.entry 
param.initPriority 
param.stackSize 
param.option = 0; 


THs 

ATick; 
BASE_priority-3; 
0x800; 


nou owe u 


/* Create thread */ 
thid = CreateThread(&param) ; 


return thid; 


mS itm si es a as aah nt */ 

void setTimer( TimerCtx* timer ) 
{ 

// --- use H-Sync timer 

timer->timerID = AllocHardTimer(TC_HLINE , 16, 1); 

RegisterIntrHandler (GetHardTimerIntrCode(timer->timerID) , 

HTYPE_C, (void*)IntFunc, timer ); 

SetTimerCompare(timer->timerID, 66); /* 1/240 sec interval */ 

SetTimerMode( timer->timerID , tEXTC_1 | tGATF_O | tZRET_1 | tREPT_1 | tCMP_1); 
} 


void startTimer( TimerCtx* timer ) 


{ 


EnableIntr (GetHardTimerIntrCode(timer->timerID) ) ; 


Tm ak a a es ee ae a */ 
void clrTimer (TimerCtx* timer) 
{ 
ReleaseIntrHandler (GetHardTimerIntrCode(timer->timerID) ) ; 
FreeHardTimer (timer->timerID) ; 
} 
void stopTimer (TimerCtx* timer) 
{ 
int oldstat, stat; 
stat = DisableIntr (GetHardTimerIntrCode(timer->timerID), &oldstat); 
} 
De ee ae 
Example of CallBack 
Perr a eee ae */ 
int metaMsgCB(unsigned char metaNo,unsigned char *bf, unsigned int len, unsigned 
{ 
sceCslMidiStream *pHdr = (sceCslMidiStream*) private; 
pHdr = pHdr; 
printf ("META %02x\n", (int)metaNo) ; 
return True; 
} 


int repeatCB(sceMidiLoopinfo *pInf, unsigned int private) 


sceCslMidiStream *pHdr = (sceCslMidiStream*) private; 
pHdr = pHdr; 
printf("Repeat %s %d $d $x\n", 
(pInf->type == sceMidiLoopInfoType_Midi) ? "Midi" : "Song", 
(int)pInf->loopTimes, (int)pInf->loopCount, pInf->loopId) ; 
return True; 


//--- Transpose example. 
#define NOTESHIFT 4 
int channelMsgCB(unsigned int mes, unsigned int private_data) 
{ 
if( ((mes&0xFO) == 0x90) || ((mes&0xFO) == 0x80) ){ 
mes += (NOTESHIFT) <<8; 
} 


return mes; 


Set up Module Context 

a a a a ss a a sc */ 
void setModuleContext( void ) 
{ 


((sceCslMidiStream*)msinBf_R)->buffsize = MSIN_BUF_SIZE; 
((sceCslMidiStream* )msinBf_R)->validsize = 0; 
((sceCs1MidiStream*)msinBf_T)->buffsize = MSIN_BUF_SIZE; 
((sceCs1MidiStream* )msinBf_T)->validsize = 0; 


midiCtx.extmod = NULL; 
midiCtx.callBack = NULL; 
midiCctx.buffGrpNum = 2; 
midiCtx.buffGrp = midiGrp; 


midiGrp[0].buffNum = 2; 
midiGrp[0].buffCtx = mInBfCtx; 
midiGrp[1].buffNum = 1; 
midiGrp[1].buffCtx = mOutBfCtx; 
minBfCtx[0].sema = 0; 
miInBfCtx[0).buff = LL; 
miInBfCctx[1].sema = 0; 
mIinBfCtx[1}.buff = &midiEnv; 


mOutBf£Cctx[0].sema = 0; 


int private) 


mOutBfCtx[0] .buff 


//-- Shared with HSynth 


((sceCslMidiStream*) streamBf) ->buffsize 
= STREAMBUF_SIZE+sizeof (sceCslMidiStream) ; 
((sceCslMidiStream*) streamBf)->validsize = 0; 


synthcCtx 
synthctx 
synthcCtx 
synthctx 


= NULL; 
.callBack = 
.buffGrpNum 
= &synthGrp; 


synthGrp.buffNum = 
synthGrp.buffctx = 


sInBfctx[0]. 
sInBfctx[0]. 


sInBfctx[1]. 
sInBfCctx[1]. 
sInBfctx[2]. 
sInBfCtx[2]. 
sInBfCtx[3]. 
sInBfCtx[3]. 


return; 


int flen, 


if ((fd = open(filename, 
ERROR(("file open failed. %s \n", 


} 


if ((flen 

} 

if (lseek(fd, 0, 
ERROR(("file open failed. %s \n", 


} 
close (fd) ; 
return flen; 


int i; 


midiCtx.buffGrp[0] .buffctx[0] .buff 
if (sceMidi_Load(&midiCtx, MIDI_IN_PORT) 
printf ("sceMidi_Load(%d) error\n", 


sema 
buff 


sema 
buff 
sema 
buff 
sema 
buff 


int MidiGetIopFileLength( char* filename 


lseek(fd, 0, 
ERROR(("file open failed. %s \n", 


SEEK_SET) 


int MidiSetSq( int addr ) 


NULL; 


ynthEnv [0]; 


Hou tw te ue out 


&synthEnv[1]; 


O_RDONLY) ) 


SEEK_END) ) 


streamBf; //-- Shared with MIDI 


) 


0) { 
filename)); return 


0) { 


filename)); return -1; 


filename)); return -1; 


(void* ) addr ; 
!= sceHSynNoError) 


i); return 1; 


} 
midiEnv.chMsgCallBack channelMsgCB; 
midiEnv.chMsgCallBack = NULL; 
midiEnv.chMsgCallBackPrivateData (unsigned int) streamBf; 
midiEnv.metaMsgCallBack metaMsgCB; 
midiEnv.metaMsgCallBackPrivateData (unsigned int)streamBf; 
midiEnv.repeatCallBack 
midiEnv.repeatCallBackPrivateData (unsigned int)streamBf; 
midiEnv.excOutPort = 
for (i i < sceMidiNumMidich; { 

midiEnv.outPort [i] 
} 
if (sceMidi_SelectMidi (&midiCtx, MIDI_IN_PORT, 0) 

printf ("sceMidi_SelectMidi Error\n"); return 1; 
} 
if (sceMidi_MidiSetLocation(&midiCtx, MIDI_IN_PORT, 0) != sceMidiNoError) 
{ 

printf ("sceMidi_MidiSetLocation Error\n"); return 1; 
} 


!'= sceMidiNoError) 


return 0; 


int MidiTransBdPacket ( EZMIDI_BANK* bank ) 
{ 


int mod, count, fd, size; 
int total = 0; 


count = bank->bdSize / gSpuTransPacketSize; 
mod = bank->bdSize - count*gSpuTransPacketSize; 


. if (( fd = open ( bank->bdName, O_RDONLY)) < 0) { 
ERROR(("bd file open failed. %s \n", bank->bdName) ); 
return -1; 


} 

printf£(" bd file open %s \n", bank->bdName ); 

while (1) 

‘ size = read ( fd, (unsigned char*) (gSpuTransPacketAddr) ,gSpuTransPacketSize ); 


if (sceHSyn_VoiceTrans(1, (void*)gSpuTransPacketAddr, (void*)bank->spuAddr+total, size) != 


sceHSynNoError) 
printf ("sceHSyn_VoisTrans Error\n"); return -1; 
} 
total += size; 
1f( size != gSpuTransPacketSize ) break; 
} 
close(fd); 
return total; 
} 
/* fs a a a ee fe ee ee eo 


bd transfer 
Loading to IO0Pmemory is not performed here. 


em i ec ae tv ee fs Gh i elfen cad Nk wf ism wae a at *x/ 
int MidiTransBd( EZMIDI_BANK* bank ) 
{ 
1£(sceHSyn_VoiceTrans(1, (void*)bank->bdAddr, (void*)bank->spuAddr ,bank->bdSize) != sceHSynNo 
Error) 
{ 
printf ("sceHSyn_VoisTrans Error\n"); return -1; 
} 
return 0; 
} 
PR Sr ce aa os enh OE tN 
Set up HardSynth 
Bee sik ieee eS */ 
int MidiSetHd( int port, EZMIDI_BANK* bank ) 
{ 
int i; 
for( i = 0; i < 2; i++ ){ 
synthEnv[i].priority = 0; 
synthEnv[i].1lfoWaveNum = 0; 
synthEnv[i].1lfoWaveTbl = NULL; 
synthEnv[i].velocityMapNum = 0; 
synthEnv[i].velocityMapTbl = NULL; 
} 
if (sceHSyn_Load(&synthCtx, port, (void*)bank->spuAddr, (void*)bank->hdAddr, 0) != sceHSynNoEr 


printf ("sceHSyn_Load(%d) error\n", MIDI_IN_PORT); return -1; 


} 


sceHSyn_SetVoiceStatBuffer (&gVstat) ; 


return 0; 


void MidiSetPortAttr( int port, int attr ) 

{ 
synthEnv[port].priority = (PORTATTR_MASK_ PRIORITY & attr); 
synthEnv[port].maxPolyphony = (PORTATTR_MASK_MAXNOTE & attr)>>8; 


// print£("port %d pri %d, note $d \n", port, synthEnv[port].priority, synthEnv [port] .maxPolyphon 
. yi 


return; 

} 

void MidiSetPortVolume( int port, int vol ) 

{ 
sceHSyn_SetVolume( &synthCtx, port, vol ); 
return; 

} 


int MidiInit( int allocsize ) 


{ 
gSpuTransPacketSize = allocsize; 
gSpuTransPacketAddr = (int)AllocSysMemory( 0, allocsize, NULL ); 
gThid = makeMyThread() ; 
timer.threadID = gThid; 
printf ("EzMIDI: create thread ID= %d, ", gThid ); 
/* Activate thread */ 
StartThread( gThid, (u_long)NULL ); 
setTimer (&timer) ; 
//-- initialize modules 
setModuleContext (); 
if (sceHSyn_Init (&synthCtx, 4167 ) != sceHSynNoError) { //-- 1/240sec 
printf ("sceHSyn_Init Error\n"); return 1; 
} 
1£ (sceMidi_Init (&midictx, 4167) != sceMidiNoError) { //-- 1/240sec 
printf ("sceMidi_Init Error\n"); return 1; 
}: 
startTimer (&timer) ; 
return (int) (&msinBf_T[0]); 
} 
int MidiQuit( int foo ) 
{ 
FreeSysMemory( (void*)gSpuTransPacketAddr ); 
stopTimer (&timer) ; 
clrTimer (&timer) ; 
return 0; 
} 
int MidiStop( int addr ) 
{ 
if (sceMidi_MidiPlaySwitch(&midiCtx, MIDI_IN_PORT,sceMidi_MidiPlayStop) != sceMidiNoError) { 
printf ("sceMidi_MidiPlaySwitch Error\n"); return 1; 
} 
return 0; 


} 
int MidiGetStatus( void ) 
{ 
return gIsinPlay; 
} 


int MidiSeek( int pos ) 


{ 
1f (sceMidi_MidiSetLocation(&midiCtx, MIDI_IN_PORT, pos) != sceMidiNoError) 
{ 
printf ("sceMidi_MidiSetLocation Error\n"); return 1; 
} 
return 0; 
} 


int MidiStart( int foo ) 


{ 
//-- main loop 
1£ (sceMidi_MidiPlaySwitch(&midiCtx, MIDI_IN_PORT,sceMidi_MidiPlayStart) != sceMidiNoError) { 
printf ("sceMidi_MidiPlaySwitch Error\n"); return 1; 
} 
return 0; 
} 


